1 T=768:POKE232,0:POKE233,3:FORL=TTOT+24:READP:POKEL,P:NEXT:DATA5,0,12,0,15,8,18,0,21,0,24,0,53,39,0,55,37,0,39,53,0,37,55,0,45,0:HGR:POKE-16302,0:ROT=0
2 FORJ=0TO7:HCOLOR=J:HPLOT0,0:CALL-3082:FORR=1TO2:FORS=1TO191:SCALE=S:XDRAWATS,S:XDRAW2AT279-S,S:XDRAW3AT279-S,191-S:XDRAW4ATS,191-S:NEXT:SCALE=140:FORY=0TO191:XDRAW5AT0,Y:NEXT:NEXT:NEXT:GOTO2